/*
 * * Copyright 1987-2022 ANSYS, Inc. All Rights Reserved.
 */

/* black body fraction of emissive power ( from "Radiative Heat Transfer"
   Modest, 1993, interpolated at constant interval of 100) */

#ifndef _FLUENT_BLACKBF_H
#define _FLUENT_BLACKBF_H

#include "dll.h"

#define N_BLACK_BODY_FRAC 491

/* units: micro meters Kelvin */
#define BLACK_BODY_FRAC_DELTA 100.0
#define BLACK_BODY_FRAC_MIN 1000.0
#define BLACK_BODY_FRAC_MAX 50000.0

static
real black_body_frac[N_BLACK_BODY_FRAC] =
{
  0.000320,
  0.000910,
  0.002130,
  0.004320,
  0.007790,
  0.012850,
  0.019720,
  0.028530,
  0.039340,
  0.052100,
  0.066720,
  0.083050,
  0.100880,
  0.120020,
  0.140250,
  0.161350,
  0.183110,
  0.205350,
  0.227880,
  0.250550,
  0.273220,
  0.295760,
  0.318090,
  0.340090,
  0.361720,
  0.382900,
  0.403590,
  0.423750,
  0.443360,
  0.462400,
  0.480850,
  0.498720,
  0.515990,
  0.532670,
  0.548770,
  0.564290,
  0.579250,
  0.593660,
  0.607530,
  0.620880,
  0.633720,
  0.646060,
  0.657940,
  0.669350,
  0.680330,
  0.690870,
  0.701010,
  0.710760,
  0.720120,
  0.729130,
  0.737780,
  0.746100,
  0.754100,
  0.761800,
  0.769200,
  0.776310,
  0.783160,
  0.789750,
  0.796090,
  0.802190,
  0.808070,
  0.813730,
  0.819180,
  0.824430,
  0.829490,
  0.834360,
  0.839060,
  0.843590,
  0.847960,
  0.852180,
  0.856250,
  0.860170,
  0.863960,
  0.867620,
  0.871150,
  0.874560,
  0.877860,
  0.881050,
  0.884130,
  0.887110,
  0.889990,
  0.892770,
  0.895470,
  0.898070,
  0.900600,
  0.903040,
  0.905410,
  0.907700,
  0.909920,
  0.912070,
  0.914150,
  0.916140,
  0.918130,
  0.920005,
  0.921880,
  0.923640,
  0.925400,
  0.927060,
  0.928720,
  0.930280,
  0.931840,
  0.933315,
  0.934790,
  0.936185,
  0.937580,
  0.938895,
  0.940210,
  0.941455,
  0.942700,
  0.943875,
  0.945050,
  0.946165,
  0.947280,
  0.948335,
  0.949390,
  0.950390,
  0.951390,
  0.952340,
  0.953290,
  0.954190,
  0.955090,
  0.955945,
  0.956800,
  0.957615,
  0.958430,
  0.959205,
  0.959980,
  0.960715,
  0.961450,
  0.962150,
  0.962850,
  0.963515,
  0.964180,
  0.964820,
  0.965460,
  0.966065,
  0.966670,
  0.967250,
  0.967830,
  0.968380,
  0.968930,
  0.969460,
  0.969990,
  0.970495,
  0.971000,
  0.971480,
  0.971960,
  0.972420,
  0.972880,
  0.973325,
  0.973770,
  0.974190,
  0.974610,
  0.975015,
  0.975420,
  0.975810,
  0.976200,
  0.976570,
  0.976940,
  0.977295,
  0.977650,
  0.977995,
  0.978340,
  0.978665,
  0.978990,
  0.979305,
  0.979620,
  0.979925,
  0.980230,
  0.980520,
  0.980810,
  0.981090,
  0.981370,
  0.981640,
  0.981910,
  0.982170,
  0.982430,
  0.982680,
  0.982930,
  0.983165,
  0.983400,
  0.983635,
  0.983870,
  0.984090,
  0.984310,
  0.984525,
  0.984740,
  0.984945,
  0.985150,
  0.985350,
  0.985550,
  0.985730,
  0.985910,
  0.986090,
  0.986270,
  0.986450,
  0.986630,
  0.986810,
  0.986990,
  0.987170,
  0.987350,
  0.987501,
  0.987652,
  0.987803,
  0.987954,
  0.988105,
  0.988256,
  0.988407,
  0.988558,
  0.988709,
  0.988860,
  0.988988,
  0.989116,
  0.989244,
  0.989372,
  0.989500,
  0.989628,
  0.989756,
  0.989884,
  0.990012,
  0.990140,
  0.990249,
  0.990358,
  0.990467,
  0.990576,
  0.990685,
  0.990794,
  0.990903,
  0.991012,
  0.991121,
  0.991230,
  0.991324,
  0.991418,
  0.991512,
  0.991606,
  0.991700,
  0.991794,
  0.991888,
  0.991982,
  0.992076,
  0.992170,
  0.992250,
  0.992330,
  0.992410,
  0.992490,
  0.992570,
  0.992650,
  0.992730,
  0.992810,
  0.992890,
  0.992970,
  0.993040,
  0.993110,
  0.993180,
  0.993250,
  0.993320,
  0.993390,
  0.993460,
  0.993530,
  0.993600,
  0.993670,
  0.993732,
  0.993794,
  0.993856,
  0.993918,
  0.993980,
  0.994042,
  0.994104,
  0.994166,
  0.994228,
  0.994290,
  0.994343,
  0.994396,
  0.994449,
  0.994502,
  0.994555,
  0.994608,
  0.994661,
  0.994714,
  0.994767,
  0.994820,
  0.994867,
  0.994914,
  0.994961,
  0.995008,
  0.995055,
  0.995102,
  0.995149,
  0.995196,
  0.995243,
  0.995290,
  0.995332,
  0.995374,
  0.995416,
  0.995458,
  0.995500,
  0.995542,
  0.995584,
  0.995626,
  0.995668,
  0.995710,
  0.995746,
  0.995782,
  0.995818,
  0.995854,
  0.995890,
  0.995926,
  0.995962,
  0.995998,
  0.996034,
  0.996070,
  0.996103,
  0.996136,
  0.996169,
  0.996202,
  0.996235,
  0.996268,
  0.996301,
  0.996334,
  0.996367,
  0.996400,
  0.996429,
  0.996458,
  0.996487,
  0.996516,
  0.996545,
  0.996574,
  0.996603,
  0.996632,
  0.996661,
  0.996690,
  0.996716,
  0.996742,
  0.996768,
  0.996794,
  0.996820,
  0.996846,
  0.996872,
  0.996898,
  0.996924,
  0.996950,
  0.996974,
  0.996998,
  0.997022,
  0.997046,
  0.997070,
  0.997094,
  0.997118,
  0.997142,
  0.997166,
  0.997190,
  0.997211,
  0.997232,
  0.997253,
  0.997274,
  0.997295,
  0.997316,
  0.997337,
  0.997358,
  0.997379,
  0.997400,
  0.997419,
  0.997438,
  0.997457,
  0.997476,
  0.997495,
  0.997514,
  0.997533,
  0.997552,
  0.997571,
  0.997590,
  0.997607,
  0.997624,
  0.997641,
  0.997658,
  0.997675,
  0.997692,
  0.997709,
  0.997726,
  0.997743,
  0.997760,
  0.997776,
  0.997792,
  0.997808,
  0.997824,
  0.997840,
  0.997856,
  0.997872,
  0.997888,
  0.997904,
  0.997920,
  0.997934,
  0.997948,
  0.997962,
  0.997976,
  0.997990,
  0.998004,
  0.998018,
  0.998032,
  0.998046,
  0.998060,
  0.998073,
  0.998086,
  0.998099,
  0.998112,
  0.998125,
  0.998138,
  0.998151,
  0.998164,
  0.998177,
  0.998190,
  0.998202,
  0.998214,
  0.998226,
  0.998238,
  0.998250,
  0.998262,
  0.998274,
  0.998286,
  0.998298,
  0.998310,
  0.998321,
  0.998332,
  0.998343,
  0.998354,
  0.998365,
  0.998376,
  0.998387,
  0.998398,
  0.998409,
  0.998420,
  0.998429,
  0.998438,
  0.998447,
  0.998456,
  0.998465,
  0.998474,
  0.998483,
  0.998492,
  0.998501,
  0.998510,
  0.998520,
  0.998530,
  0.998540,
  0.998550,
  0.998560,
  0.998570,
  0.998580,
  0.998590,
  0.998600,
  0.998610,
  0.998618,
  0.998626,
  0.998634,
  0.998642,
  0.998650,
  0.998658,
  0.998666,
  0.998674,
  0.998682,
  0.998690,
  0.998698,
  0.998706,
  0.998714,
  0.998722,
  0.998730,
  0.998738,
  0.998746,
  0.998754,
  0.998762,
  0.998770,
  0.998777,
  0.998784,
  0.998791,
  0.998798,
  0.998805,
  0.998812,
  0.998819,
  0.998826,
  0.998833,
  0.998840,
  0.998846,
  0.998852,
  0.998858,
  0.998864,
  0.998870,
  0.998876,
  0.998882,
  0.998888,
  0.998894,
  0.998900
};

#endif /* _FLUENT_BLACKBF_H */
